home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 July / 07_02.iso / software / xq-xsetup / files / setup.exe / {app} / plugins / XQ IE Persistent Caching.xpl < prev    next >
Text File  |  2000-07-30  |  1KB  |  52 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="Internet\Internet Explorer\System"
  5. "NAME"="Persistent Caching"
  6. "VERSION"="1.02"
  7. "LANGUAGE"="VBScript"
  8. "TEXT 1"="Disable IE Persistent Caching"
  9. "DESCRIPTION 1"="Checked box disables Persistent Caching; unchecked [cleared] box enables Persistent Caching [default]."
  10. "DESCRIPTION 2"="After Persistent Cache is disabled, clearing TIF & History folders from Tools/Internet Options/General Tab will purge retained URLs."
  11. "DESCRIPTION 3"="NOTE: This plug-in will only work for IE 5.x and above."
  12. "AUTHOR"="Ojatex@aol.com"
  13. "CONTACTURL"="http://members.aol.com/ojatex/"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15. "COMMENT 1"=" "
  16. "COMMENT 2"="Want More Fun? Use Deltree to kick Windows around."
  17.  
  18. sP="HKLM\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Cache\"
  19. v1="Persistent" 'Binary
  20.  
  21.  
  22. Sub Plugin_Initialize 
  23.  if RegPathExists(sP) then
  24.     s=RegReadValue(sP&v1)
  25.     if s="00000000" then SetUIElement 1,true
  26.  else
  27.     Disable
  28.  end if
  29. End Sub
  30.  
  31.  
  32. Sub Plugin_CheckData(ElementIndex)
  33. End Sub
  34.  
  35.  
  36.  
  37. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  38.  b=GetUIElement(1)
  39.  if b=true then
  40.     Call RegWriteValue(sp&v1,"00000000",3)
  41.  else
  42.     Call RegWriteValue(sp&v1,"01000000",3) 
  43.  end if
  44. End Sub
  45.  
  46.  
  47. Sub Plugin_Terminate 
  48. End Sub
  49.  
  50.  
  51.  
  52.